! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Jacobian Data Structures File
! 
! Generated by KPP-2.2.4_gc symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : gckpp_JacobianSP.f90
! Time                 : Sat Oct 24 17:55:27 2020
! Working directory    : /n/home08/kbates/GC/Code.12.3.0_racm2/KPP/Tropchem
! Equation file        : gckpp.kpp
! Output root filename : gckpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE gckpp_JacobianSP

  PUBLIC
  SAVE


! Sparse Jacobian Data


  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_0 = (/ &
       1,  2,  3,  4,  4,  4,  4,  4,  5,  5,  5,  5, & ! index 1 - 12
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 13 - 24
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 25 - 36
       5,  6,  6,  6,  7,  7,  7,  7,  7,  7,  7,  7, & ! index 37 - 48
       8,  8,  8,  8,  8,  8,  8,  8,  9,  9, 10, 10, & ! index 49 - 60
      10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 12, 12, & ! index 61 - 72
      12, 13, 13, 14, 14, 14, 14, 14, 15, 15, 15, 16, & ! index 73 - 84
      16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, & ! index 85 - 96
      16, 17, 17, 17, 18, 18, 18, 18, 18, 18, 18, 18, & ! index 97 - 108
      18, 18, 19, 19, 20, 20, 21, 21, 22, 22, 22, 22, & ! index 109 - 120
      23, 23, 24, 24, 24, 25, 25, 26, 26, 26, 27, 27, & ! index 121 - 132
      27, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 133 - 144
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 145 - 156
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 157 - 168
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 169 - 180
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 181 - 192
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 193 - 204
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 29, 29, & ! index 205 - 216
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 217 - 228
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 229 - 240
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 241 - 252
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 253 - 264
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 265 - 276
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 277 - 288
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 30, & ! index 289 - 300
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 301 - 312
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 313 - 324
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 325 - 336
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 337 - 348
      30, 30, 30, 30, 30, 31, 31, 31, 31, 31, 31, 31 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_1 = (/ &
      31, 31, 31, 32, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 361 - 372
      32, 33, 33, 33, 34, 34, 34, 34, 34, 34, 34, 34, & ! index 373 - 384
      34, 34, 34, 34, 34, 34, 35, 35, 35, 36, 36, 36, & ! index 385 - 396
      37, 37, 37, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 397 - 408
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 409 - 420
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 421 - 432
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 433 - 444
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 445 - 456
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 457 - 468
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 469 - 480
      38, 38, 38, 38, 38, 38, 38, 38, 38, 39, 39, 39, & ! index 481 - 492
      39, 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, & ! index 493 - 504
      39, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 505 - 516
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 517 - 528
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 529 - 540
      41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, & ! index 541 - 552
      41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, & ! index 553 - 564
      41, 42, 42, 42, 42, 42, 42, 42, 42, 42, 42, 43, & ! index 565 - 576
      43, 43, 44, 44, 44, 44, 44, 45, 45, 45, 45, 45, & ! index 577 - 588
      45, 45, 45, 46, 46, 46, 47, 47, 47, 47, 47, 47, & ! index 589 - 600
      47, 47, 47, 47, 47, 47, 48, 48, 48, 48, 49, 49, & ! index 601 - 612
      49, 50, 50, 50, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 613 - 624
      51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 625 - 636
      51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 637 - 648
      51, 51, 51, 51, 51, 52, 52, 52, 52, 52, 52, 52, & ! index 649 - 660
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 661 - 672
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 53, 53, & ! index 673 - 684
      53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53, & ! index 685 - 696
      53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53, & ! index 697 - 708
      53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53, 53 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_2 = (/ &
      53, 53, 53, 53, 54, 54, 54, 54, 54, 54, 54, 54, & ! index 721 - 732
      54, 54, 54, 54, 54, 54, 55, 55, 55, 55, 55, 55, & ! index 733 - 744
      55, 55, 55, 55, 55, 55, 55, 55, 55, 55, 55, 55, & ! index 745 - 756
      55, 55, 55, 55, 55, 56, 56, 56, 56, 56, 56, 56, & ! index 757 - 768
      56, 56, 56, 57, 57, 57, 57, 57, 57, 57, 57, 57, & ! index 769 - 780
      57, 57, 57, 57, 57, 58, 58, 58, 58, 58, 58, 58, & ! index 781 - 792
      58, 58, 58, 58, 58, 58, 58, 58, 58, 58, 58, 58, & ! index 793 - 804
      58, 58, 58, 58, 58, 58, 59, 59, 59, 59, 60, 60, & ! index 805 - 816
      60, 60, 61, 61, 61, 61, 62, 62, 62, 63, 63, 63, & ! index 817 - 828
      64, 64, 64, 64, 64, 65, 65, 65, 65, 66, 66, 66, & ! index 829 - 840
      67, 67, 67, 68, 68, 68, 68, 68, 68, 68, 68, 68, & ! index 841 - 852
      68, 69, 69, 69, 69, 69, 69, 69, 70, 70, 70, 71, & ! index 853 - 864
      71, 71, 72, 72, 72, 73, 73, 73, 74, 74, 74, 75, & ! index 865 - 876
      75, 75, 76, 76, 76, 77, 77, 77, 78, 78, 78, 79, & ! index 877 - 888
      79, 79, 80, 80, 81, 81, 81, 82, 82, 82, 83, 83, & ! index 889 - 900
      83, 84, 84, 84, 85, 85, 85, 86, 86, 86, 87, 87, & ! index 901 - 912
      87, 88, 88, 88, 89, 89, 90, 90, 91, 91, 91, 91, & ! index 913 - 924
      92, 92, 93, 93, 93, 93, 94, 94, 95, 95, 96, 96, & ! index 925 - 936
      96, 97, 97, 97, 98, 98, 98, 99, 99,100,100,100, & ! index 937 - 948
     101,101,102,102,103,103,104,104,105,105,105,106, & ! index 949 - 960
     106,106,106,107,107,107,107,108,108,108,108,108, & ! index 961 - 972
     108,108,109,109,109,109,110,110,110,111,111,111, & ! index 973 - 984
     112,112,112,112,112,113,113,113,113,113,114,114, & ! index 985 - 996
     114,114,114,114,114,114,114,114,115,115,115,115, & ! index 997 - 1008
     116,116,116,116,117,117,117,118,118,118,118,118, & ! index 1009 - 1020
     118,119,119,119,119,119,119,120,120,120,121,121, & ! index 1021 - 1032
     121,122,122,122,123,123,123,124,124,124,124,124, & ! index 1033 - 1044
     124,124,125,125,125,125,126,126,126,126,127,127, & ! index 1045 - 1056
     127,128,128,128,128,129,129,129,130,130,130,131, & ! index 1057 - 1068
     131,131,131,132,132,132,132,132,132,133,133,133 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_3 = (/ &
     133,134,134,134,134,134,134,135,135,135,135,135, & ! index 1081 - 1092
     135,135,136,136,136,136,136,137,137,137,137,137, & ! index 1093 - 1104
     138,138,138,138,138,139,139,139,139,139,140,140, & ! index 1105 - 1116
     140,140,141,141,141,141,142,142,142,142,143,143, & ! index 1117 - 1128
     143,143,143,143,143,143,144,144,144,144,144,144, & ! index 1129 - 1140
     145,145,145,145,146,146,146,146,146,147,147,147, & ! index 1141 - 1152
     147,147,148,148,148,148,148,149,149,149,149,149, & ! index 1153 - 1164
     149,149,149,149,149,149,150,150,150,150,150,151, & ! index 1165 - 1176
     151,151,152,152,152,152,153,153,153,153,154,154, & ! index 1177 - 1188
     154,154,155,155,155,155,156,156,156,156,157,157, & ! index 1189 - 1200
     157,157,157,158,158,158,158,158,158,158,158,158, & ! index 1201 - 1212
     159,159,159,159,159,159,159,159,159,159,160,160, & ! index 1213 - 1224
     160,160,160,161,161,161,161,161,162,162,162,162, & ! index 1225 - 1236
     162,162,163,163,163,163,164,164,164,164,164,164, & ! index 1237 - 1248
     165,165,165,165,165,165,165,166,166,166,166,166, & ! index 1249 - 1260
     166,167,167,167,167,168,168,168,168,169,169,169, & ! index 1261 - 1272
     169,169,169,169,169,169,169,169,169,170,170,170, & ! index 1273 - 1284
     170,170,171,171,171,171,171,172,172,172,172,172, & ! index 1285 - 1296
     173,173,173,173,173,173,173,174,174,174,174,174, & ! index 1297 - 1308
     174,174,175,175,175,175,175,175,175,176,176,176, & ! index 1309 - 1320
     176,176,177,177,177,177,177,177,178,178,178,178, & ! index 1321 - 1332
     178,178,179,179,179,179,180,180,180,180,180,181, & ! index 1333 - 1344
     181,181,181,181,182,182,182,182,183,183,183,183, & ! index 1345 - 1356
     183,183,184,184,184,184,184,185,185,185,185,185, & ! index 1357 - 1368
     185,185,186,186,186,186,186,186,186,187,187,187, & ! index 1369 - 1380
     187,187,187,187,187,188,188,188,188,188,188,188, & ! index 1381 - 1392
     189,189,189,189,190,190,190,190,190,190,191,191, & ! index 1393 - 1404
     191,191,191,191,191,192,192,192,192,192,192,192, & ! index 1405 - 1416
     192,192,193,193,193,193,193,193,193,194,194,194, & ! index 1417 - 1428
     194,194,194,194,194,194,194,195,195,195,195,195 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_4 = (/ &
     195,195,195,196,196,196,196,196,196,196,196,197, & ! index 1441 - 1452
     197,197,197,197,197,197,197,197,197,198,198,198, & ! index 1453 - 1464
     198,198,198,198,199,199,199,199,199,199,199,199, & ! index 1465 - 1476
     199,199,199,199,199,199,199,199,199,199,200,200, & ! index 1477 - 1488
     200,200,200,200,200,200,201,201,201,201,201,201, & ! index 1489 - 1500
     201,201,202,202,202,202,202,202,202,203,203,203, & ! index 1501 - 1512
     203,203,203,203,203,203,203,204,204,204,204,204, & ! index 1513 - 1524
     205,205,205,205,205,205,205,205,205,206,206,206, & ! index 1525 - 1536
     206,206,206,206,206,207,207,207,207,207,207,207, & ! index 1537 - 1548
     207,207,207,207,207,207,207,207,207,207,207,207, & ! index 1549 - 1560
     207,207,207,207,207,207,208,208,208,208,208,208, & ! index 1561 - 1572
     208,208,208,208,208,208,208,208,208,208,208,208, & ! index 1573 - 1584
     208,208,208,209,209,209,209,209,209,209,209,209, & ! index 1585 - 1596
     210,210,210,210,210,210,210,210,210,210,211,211, & ! index 1597 - 1608
     211,211,211,211,211,211,212,212,212,212,212,212, & ! index 1609 - 1620
     212,212,212,212,212,212,213,213,213,213,213,213, & ! index 1621 - 1632
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1633 - 1644
     213,213,213,213,213,213,213,213,213,214,214,214, & ! index 1645 - 1656
     214,214,214,214,214,214,214,214,214,214,214,215, & ! index 1657 - 1668
     215,215,215,215,215,215,215,215,215,215,215,215, & ! index 1669 - 1680
     215,215,215,215,215,216,216,216,216,216,216,216, & ! index 1681 - 1692
     216,216,217,217,217,217,217,217,217,217,217,217, & ! index 1693 - 1704
     217,217,218,218,218,218,218,218,218,218,218,219, & ! index 1705 - 1716
     219,219,219,219,219,219,219,219,219,220,220,220, & ! index 1717 - 1728
     220,220,220,220,220,220,220,220,220,220,220,221, & ! index 1729 - 1740
     221,221,221,221,221,221,222,222,222,222,222,222, & ! index 1741 - 1752
     222,222,222,222,222,222,223,223,223,223,223,223, & ! index 1753 - 1764
     223,224,224,224,224,224,224,224,224,224,224,224, & ! index 1765 - 1776
     224,224,224,224,224,224,224,224,224,224,225,225, & ! index 1777 - 1788
     225,225,225,225,225,226,226,226,226,226,226,226 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_5 = (/ &
     226,227,227,227,227,227,228,228,228,228,228,228, & ! index 1801 - 1812
     228,228,228,228,229,229,229,229,229,229,229,229, & ! index 1813 - 1824
     229,230,230,230,230,230,230,230,230,230,231,231, & ! index 1825 - 1836
     231,231,231,231,231,231,231,231,231,232,232,232, & ! index 1837 - 1848
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 1849 - 1860
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 1861 - 1872
     232,232,232,232,232,232,233,233,233,233,233,233, & ! index 1873 - 1884
     233,233,234,234,234,234,234,234,234,234,234,234, & ! index 1885 - 1896
     234,234,235,235,235,235,235,235,235,235,235,235, & ! index 1897 - 1908
     235,235,236,236,236,236,236,236,236,236,236,236, & ! index 1909 - 1920
     237,237,237,237,237,237,237,237,237,237,237,238, & ! index 1921 - 1932
     238,238,238,238,238,238,238,238,238,238,239,239, & ! index 1933 - 1944
     239,239,239,239,239,239,239,239,239,239,239,239, & ! index 1945 - 1956
     239,239,239,240,240,240,240,240,240,240,240,240, & ! index 1957 - 1968
     240,240,240,240,240,240,240,240,240,240,240,240, & ! index 1969 - 1980
     240,240,240,241,241,241,241,241,241,241,241,241, & ! index 1981 - 1992
     241,241,241,241,241,242,242,242,242,242,242,242, & ! index 1993 - 2004
     242,242,242,242,242,242,242,242,242,243,243,243, & ! index 2005 - 2016
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2017 - 2028
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2029 - 2040
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2041 - 2052
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2053 - 2064
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2065 - 2076
     243,243,243,243,244,244,244,244,244,244,244,244, & ! index 2077 - 2088
     244,244,244,244,244,245,245,245,245,245,245,245, & ! index 2089 - 2100
     245,245,246,246,246,246,246,246,246,246,246,246, & ! index 2101 - 2112
     246,246,247,247,247,247,247,247,247,247,247,247, & ! index 2113 - 2124
     247,247,248,248,248,248,248,248,248,248,248,249, & ! index 2125 - 2136
     249,249,249,249,249,249,249,249,249,249,249,249, & ! index 2137 - 2148
     250,250,250,250,250,250,250,250,250,250,250,250 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_6 = (/ &
     250,250,250,250,250,250,250,250,250,250,250,250, & ! index 2161 - 2172
     250,250,250,250,250,250,250,250,250,250,250,250, & ! index 2173 - 2184
     250,250,250,250,251,251,251,251,251,251,251,251, & ! index 2185 - 2196
     251,251,251,251,251,251,252,252,252,252,252,252, & ! index 2197 - 2208
     252,252,252,252,252,252,252,252,252,253,253,253, & ! index 2209 - 2220
     253,253,253,253,253,253,253,254,254,254,254,254, & ! index 2221 - 2232
     254,254,255,255,255,255,255,255,255,255,255,255, & ! index 2233 - 2244
     255,255,255,255,255,255,255,255,255,255,255,255, & ! index 2245 - 2256
     255,256,256,256,256,256,256,256,256,256,256,256, & ! index 2257 - 2268
     256,257,257,257,257,257,257,257,257,257,257,257, & ! index 2269 - 2280
     258,258,258,258,258,258,258,258,258,258,258,258, & ! index 2281 - 2292
     258,258,258,258,258,258,258,258,258,258,258,258, & ! index 2293 - 2304
     258,258,258,258,258,258,258,259,259,259,259,259, & ! index 2305 - 2316
     259,259,259,259,259,259,259,260,260,260,260,260, & ! index 2317 - 2328
     260,260,260,260,260,260,260,260,261,261,261,261, & ! index 2329 - 2340
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2341 - 2352
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2353 - 2364
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2365 - 2376
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2377 - 2388
     261,262,262,262,262,262,262,262,262,263,263,263, & ! index 2389 - 2400
     263,263,263,263,263,263,263,263,263,263,263,263, & ! index 2401 - 2412
     264,264,264,264,264,264,264,264,264,264,264,264, & ! index 2413 - 2424
     264,264,264,265,265,265,265,265,265,265,265,265, & ! index 2425 - 2436
     265,265,265,265,266,266,266,266,266,266,266,266, & ! index 2437 - 2448
     266,266,266,266,266,266,266,266,266,266,266,267, & ! index 2449 - 2460
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2461 - 2472
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2473 - 2484
     267,268,268,268,268,268,268,268,268,268,268,268, & ! index 2485 - 2496
     268,269,269,269,269,269,269,269,269,269,269,269, & ! index 2497 - 2508
     269,269,269,269,269,269,269,269,269,269,269,269 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_7 = (/ &
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2521 - 2532
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2533 - 2544
     269,269,269,269,269,269,269,269,269,269,270,270, & ! index 2545 - 2556
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 2557 - 2568
     271,271,271,271,271,271,271,271,271,271,271,271, & ! index 2569 - 2580
     271,271,271,271,271,271,271,271,271,272,272,272, & ! index 2581 - 2592
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 2593 - 2604
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 2605 - 2616
     272,272,273,273,273,273,273,273,273,273,273,273, & ! index 2617 - 2628
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2629 - 2640
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2641 - 2652
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2653 - 2664
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2665 - 2676
     273,273,273,273,273,273,274,274,274,274,274,274, & ! index 2677 - 2688
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2689 - 2700
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2701 - 2712
     274,274,274,275,275,275,275,275,275,275,275,275, & ! index 2713 - 2724
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2725 - 2736
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2737 - 2748
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2749 - 2760
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2761 - 2772
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2773 - 2784
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2785 - 2796
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2797 - 2808
     275,275,275,275,275,275,275,275,276,276,276,276, & ! index 2809 - 2820
     276,276,276,276,276,276,276,276,276,276,276,276, & ! index 2821 - 2832
     276,276,276,277,277,277,277,277,277,277,277,277, & ! index 2833 - 2844
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 2845 - 2856
     277,277,277,277,277,277,278,278,278,278,278,278, & ! index 2857 - 2868
     278,278,278,278,278,278,278,278,278,278,278,278 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_8 = (/ &
     278,278,278,278,278,278,278,278,278,278,278,278, & ! index 2881 - 2892
     278,278,278,278,278,279,279,279,279,279,279,279, & ! index 2893 - 2904
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2905 - 2916
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2917 - 2928
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2929 - 2940
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2941 - 2952
     279,279,279,279,279,279,279,280,280,280,280,280, & ! index 2953 - 2964
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2965 - 2976
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2977 - 2988
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2989 - 3000
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 3001 - 3012
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 3013 - 3024
     280,280,280,280,280,280,280,280,280,280,281,281, & ! index 3025 - 3036
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3037 - 3048
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3049 - 3060
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3061 - 3072
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3073 - 3084
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3085 - 3096
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3097 - 3108
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3109 - 3120
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3121 - 3132
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3133 - 3144
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3145 - 3156
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 3157 - 3168
     281,281,281,281,282,282,282,282,282,282,282,282, & ! index 3169 - 3180
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 3181 - 3192
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 3193 - 3204
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 3205 - 3216
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 3217 - 3228
     282,282,282,282,282,282,282,282,282,282,282,282 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_9 = (/ &
     282,282,282,282,282,282,282,282,282,282,282,283, & ! index 3241 - 3252
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3253 - 3264
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3265 - 3276
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3277 - 3288
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3289 - 3300
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3301 - 3312
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3313 - 3324
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3325 - 3336
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3337 - 3348
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3349 - 3360
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3361 - 3372
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3373 - 3384
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3385 - 3396
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3397 - 3408
     283,283,283,283,283,283,283,283,283,283,284,284, & ! index 3409 - 3420
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3421 - 3432
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3433 - 3444
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3445 - 3456
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3457 - 3468
     284,284,284,284,284,284,284,284,285,285,285,285, & ! index 3469 - 3480
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3481 - 3492
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3493 - 3504
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3505 - 3516
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3517 - 3528
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3529 - 3540
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3541 - 3552
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3553 - 3564
     285,285,285,285,285,285,285,285,285,285,285,286, & ! index 3565 - 3576
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3577 - 3588
     286,286,286,286,286,286,286,286,286,286,286,286 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_10 = (/ &
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3601 - 3612
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3613 - 3624
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3625 - 3636
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3637 - 3648
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3649 - 3660
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3661 - 3672
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3673 - 3684
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3685 - 3696
     286,286,286,286,287,287,287,287,287,287,287,287, & ! index 3697 - 3708
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3709 - 3720
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3721 - 3732
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3733 - 3744
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3745 - 3756
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3757 - 3768
     287,287,287,287,287,287,287,287,287,287,288,288, & ! index 3769 - 3780
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3781 - 3792
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3793 - 3804
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3805 - 3816
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3817 - 3828
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3829 - 3840
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3841 - 3852
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3853 - 3864
     288,288,288,288,288,289,289,289,289,289,289,289, & ! index 3865 - 3876
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3877 - 3888
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3889 - 3900
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3901 - 3912
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3913 - 3924
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3925 - 3936
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3937 - 3948
     289,289,289,290,290,290,290,290,290,290,290,290 /)
  INTEGER, PARAMETER, DIMENSION(102) :: LU_IROW_11 = (/ &
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3961 - 3972
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3973 - 3984
     290,290,290,290,290,290,290,291,291,291,291,291, & ! index 3985 - 3996
     291,291,291,291,291,291,291,291,291,291,291,291, & ! index 3997 - 4008
     291,291,291,291,291,291,291,292,292,292,292,292, & ! index 4009 - 4020
     292,292,292,292,292,292,292,292,292,292,292,292, & ! index 4021 - 4032
     292,292,292,292,292,292,292,292,292,292,292,292, & ! index 4033 - 4044
     292,292,292,292,292,292,292,292,292,292,292,292, & ! index 4045 - 4056
     292,292,292,292,292,292 /)
  INTEGER, PARAMETER, DIMENSION(4062) :: LU_IROW = (/&
    LU_IROW_0, LU_IROW_1, LU_IROW_2, LU_IROW_3, LU_IROW_4, &
    LU_IROW_5, LU_IROW_6, LU_IROW_7, LU_IROW_8, LU_IROW_9, &
    LU_IROW_10, LU_IROW_11 /)

  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_0 = (/ &
       1,  2,  3,  4, 80, 95,100,109,  5,144,151,157, & ! index 1 - 12
     164,174,187,188,198,204,208,220,225,237,250,254, & ! index 13 - 24
     258,260,265,269,280,281,282,283,284,285,287,288, & ! index 25 - 36
     289,  6, 91,114,  7, 80, 95,100,109,129,150,183, & ! index 37 - 48
       8, 80, 95,100,109,129,150,183,  9, 10, 10,177, & ! index 49 - 60
     190,223,281,285,286,288,289, 11,227,283, 12,227, & ! index 61 - 72
     285, 13, 14, 14,155,167,168,283, 15,130,283, 16, & ! index 73 - 84
     108,143,169,205,211,226,229,230,233,282,286,288, & ! index 85 - 96
     289, 17,219,283, 18,186,191,193,196,202,221,251, & ! index 97 - 108
     277,283, 19,214, 20,214, 21,232, 22,107,112,113, & ! index 109 - 120
      23, 24, 24,188,283, 25,261, 26,120,284, 27,120, & ! index 121 - 132
     283, 28, 91, 96,114,116,117,128,132,133,135,137, & ! index 133 - 144
     154,158,159,162,166,178,184,185,186,187,188,190, & ! index 145 - 156
     191,192,193,194,196,198,200,201,202,203,205,209, & ! index 157 - 168
     211,212,216,217,218,219,220,221,222,223,225,226, & ! index 169 - 180
     228,229,230,231,233,235,237,238,241,243,245,246, & ! index 181 - 192
     247,248,249,251,252,253,256,257,259,260,265,266, & ! index 193 - 204
     267,268,272,281,282,283,286,287,288,289, 29, 80, & ! index 205 - 216
      95,100,108,120,123,124,129,130,136,139,140,143, & ! index 217 - 228
     144,145,150,152,164,169,170,171,172,176,177,178, & ! index 229 - 240
     179,181,182,183,185,189,190,192,198,200,201,203, & ! index 241 - 252
     204,209,211,212,214,215,217,219,223,226,227,229, & ! index 253 - 264
     230,232,233,236,238,239,241,242,244,247,248,253, & ! index 265 - 276
     254,255,261,262,263,268,270,271,273,274,275,276, & ! index 277 - 288
     278,279,281,283,284,285,286,288,289,290,291, 30, & ! index 289 - 300
     103,121,122,127,144,151,154,157,161,163,165,174, & ! index 301 - 312
     179,180,182,188,189,195,204,206,210,220,223,224, & ! index 313 - 324
     225,227,232,234,236,257,258,260,261,263,264,265, & ! index 325 - 336
     266,269,270,271,275,276,278,279,281,282,283,284, & ! index 337 - 348
     285,287,288,289,292, 31,186,191,193,196,202,221 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_1 = (/ &
     251,280,283, 32,186,191,193,196,202,221,251,277, & ! index 361 - 372
     283, 33,283,287, 34,179,182,186,189,191,193,196, & ! index 373 - 384
     202,221,251,281,283,284, 35,104,283, 36,101,283, & ! index 385 - 396
      37,102,283, 38,117,120,130,134,141,148,151,155, & ! index 397 - 408
     156,157,160,161,167,168,174,175,177,178,180,185, & ! index 409 - 420
     188,189,190,192,198,200,201,204,205,209,211,212, & ! index 421 - 432
     216,218,219,220,222,224,225,226,227,228,229,230, & ! index 433 - 444
     231,232,233,235,236,237,238,245,246,247,248,249, & ! index 445 - 456
     251,252,253,254,256,257,258,259,260,262,263,265, & ! index 457 - 468
     266,267,268,269,270,271,272,274,276,277,278,280, & ! index 469 - 480
     281,282,283,284,285,286,287,288,289, 39,103,189, & ! index 481 - 492
     198,204,219,220,245,251,253,258,269,281,283,284, & ! index 493 - 504
     288, 40,125,142,144,146,170,179,182,187,197,199, & ! index 505 - 516
     206,213,216,217,222,225,228,246,247,248,249,253, & ! index 517 - 528
     257,259,268,272,281,282,283,284,285,288,289,291, & ! index 529 - 540
      41,191,198,216,222,225,228,231,235,237,249,256, & ! index 541 - 552
     257,259,265,266,267,268,269,272,281,282,283,288, & ! index 553 - 564
     289, 42,101,102,110,111,143,211,226,281,283, 43, & ! index 565 - 576
     104,283, 44,104,110,111,283, 45,200,201,229,282, & ! index 577 - 588
     285,288,289, 46, 82,283, 47,110,111,211,226,229, & ! index 589 - 600
     230,233,282,285,288,289, 48,140,239,283, 49, 83, & ! index 601 - 612
     283, 50, 84,283, 51, 91,114,130,139,140,144,145, & ! index 613 - 624
     152,171,172,176,181,183,184,187,204,232,237,239, & ! index 625 - 636
     241,254,255,257,261,262,271,273,275,278,279,283, & ! index 637 - 648
     284,285,286,288,290, 52, 94,103,144,151,154,162, & ! index 649 - 660
     177,184,190,195,205,206,209,220,226,233,234,254, & ! index 661 - 672
     257,258,262,281,282,283,284,285,288,289, 53, 94, & ! index 673 - 684
     148,151,154,156,161,162,163,184,195,196,198,202, & ! index 685 - 696
     206,219,220,224,225,229,230,231,234,236,257,259, & ! index 697 - 708
     262,263,266,269,271,276,277,280,281,282,283,284 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_2 = (/ &
     285,286,288,289, 54,108,143,169,205,211,226,229, & ! index 721 - 732
     230,233,282,286,288,289, 55,184,187,195,200,201, & ! index 733 - 744
     205,209,211,212,226,229,230,233,234,238,272,281, & ! index 745 - 756
     282,283,285,288,289, 56,197,225,249,256,272,281, & ! index 757 - 768
     283,288,289, 57,154,162,189,223,246,248,252,253, & ! index 769 - 780
     260,281,282,284,289, 58,131,138,141,173,191,216, & ! index 781 - 792
     228,249,256,267,270,272,276,277,280,281,282,283, & ! index 793 - 804
     284,286,287,288,289,291, 59,239,283,285, 60,140, & ! index 805 - 816
     283,285, 61,144,283,285, 62,210,283, 63, 81,283, & ! index 817 - 828
      64,195,206,234,283, 65,139,283,285, 66, 84,283, & ! index 829 - 840
      67, 83,283, 68,110,111,211,226,233,282,285,288, & ! index 841 - 852
     289, 69,230,233,282,285,288,289, 70, 86,283, 71, & ! index 853 - 864
      85,283, 72, 88,283, 73, 87,283, 74,234,283, 75, & ! index 865 - 876
     195,283, 76, 85,283, 77, 86,283, 78, 87,283, 79, & ! index 877 - 888
      88,283, 80,124, 81, 82,283, 81, 82,283, 83, 84, & ! index 889 - 900
     283, 83, 84,283, 85, 86,283, 85, 86,283, 87, 88, & ! index 901 - 912
     283, 87, 88,283, 89,283, 90,283, 91,166,203,217, & ! index 913 - 924
      92,283, 93,218,245,288, 94,154, 95,242, 96,198, & ! index 925 - 936
     286, 97,252,286, 98,286,292, 99,283,100,124,242, & ! index 937 - 948
     101,283,102,283,103,283,104,283,105,240,288,106, & ! index 949 - 960
     129,150,183,107,168,254,283,108,178,282,285,286, & ! index 961 - 972
     288,289,109,240,281,283,101,110,283,102,111,283, & ! index 973 - 984
     112,155,167,204,283,113,155,167,204,283, 93,114, & ! index 985 - 996
     204,218,219,236,245,254,288,291,115,281,282,283, & ! index 997 - 1008
     116,192,283,288,117,286,289,118,129,150,183,242, & ! index 1009 - 1020
     274,119,188,271,283,285,286,120,283,284,121,283, & ! index 1021 - 1032
     287,122,283,287,123,274,283, 80, 95,100,124,242, & ! index 1033 - 1044
     244,288,125,222,281,283,126,235,281,283,127,283, & ! index 1045 - 1056
     287,128,152,273,283,129,240,286,130,283,285,131, & ! index 1057 - 1068
     267,281,283,129,132,240,283,286,288,133,281,283 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_3 = (/ &
     286,134,147,192,285,288,289,123,135,244,274,283, & ! index 1081 - 1092
     287,289,136,242,244,274,283,137,188,282,283,286, & ! index 1093 - 1104
     138,223,252,281,283,139,140,239,283,285,104,140, & ! index 1105 - 1116
     283,285,141,228,281,283,142,216,281,283,140,143, & ! index 1117 - 1128
     210,239,281,283,285,286,104,110,111,144,283,285, & ! index 1129 - 1140
     145,283,285,287,146,248,253,281,283,147,192,281, & ! index 1141 - 1152
     283,289,148,231,256,281,283,149,171,172,181,214, & ! index 1153 - 1164
     215,241,244,255,273,274,150,194,242,281,283,151, & ! index 1165 - 1176
     265,283,152,273,285,286,153,283,287,292,154,265, & ! index 1177 - 1188
     281,288,155,265,281,283,156,259,281,283,157,221, & ! index 1189 - 1200
     266,281,283,158,171,172,181,214,244,255,283,292, & ! index 1201 - 1212
     135,159,215,241,244,273,274,283,287,289,160,281, & ! index 1213 - 1224
     283,287,289,161,220,281,283,288,151,162,265,281, & ! index 1225 - 1236
     283,288,163,257,281,283,164,257,282,283,284,288, & ! index 1237 - 1248
     163,165,257,281,282,283,288,166,203,217,283,284, & ! index 1249 - 1260
     285,167,265,281,283,168,265,281,283,139,140,169, & ! index 1261 - 1272
     238,239,282,283,284,285,286,288,289,170,218,245, & ! index 1273 - 1284
     281,283,171,214,241,255,284,172,214,241,255,284, & ! index 1285 - 1296
     173,254,267,283,284,287,289,174,245,254,281,283, & ! index 1297 - 1308
     284,288,175,225,260,271,281,283,285,176,283,285, & ! index 1309 - 1320
     287,292,177,262,281,283,288,289,178,185,282,285, & ! index 1321 - 1332
     288,289,179,283,284,285,180,260,283,284,286,181, & ! index 1333 - 1344
     244,273,286,292,182,283,284,285,183,194,240,242, & ! index 1345 - 1356
     285,286,184,265,281,282,288,185,210,282,283,285, & ! index 1357 - 1368
     288,289,186,227,277,280,284,286,288,164,187,257, & ! index 1369 - 1380
     281,282,283,284,288,119,188,223,271,283,285,286, & ! index 1381 - 1392
     189,283,284,285,190,262,281,285,288,289,191,270, & ! index 1393 - 1404
     277,280,284,286,288,120,147,192,281,283,284,285, & ! index 1405 - 1416
     288,289,193,263,277,280,284,286,288,105,129,183, & ! index 1417 - 1428
     194,240,242,283,285,286,288,195,230,233,282,283 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_4 = (/ &
     285,288,289,196,263,271,277,280,284,286,288,177, & ! index 1441 - 1452
     190,197,262,268,281,283,285,288,289, 96,198,236, & ! index 1453 - 1464
     281,283,286,288,199,216,222,228,235,237,246,248, & ! index 1465 - 1476
     249,253,256,257,259,265,266,272,283,289,101,200, & ! index 1477 - 1488
     281,282,283,285,288,289,102,201,281,282,283,285, & ! index 1489 - 1500
     288,289,202,276,277,280,284,286,288,203,246,247, & ! index 1501 - 1512
     253,281,282,283,285,288,289,204,265,283,284,288, & ! index 1513 - 1524
     140,205,239,281,282,283,285,288,289,206,229,230, & ! index 1525 - 1536
     282,283,285,288,289,179,182,186,189,191,193,196, & ! index 1537 - 1548
     202,207,221,227,251,263,270,271,276,277,280,281, & ! index 1549 - 1560
     283,284,285,286,287,288,103,189,198,204,208,219, & ! index 1561 - 1572
     220,236,245,251,253,258,265,269,281,283,284,285, & ! index 1573 - 1584
     286,287,288,140,209,239,281,282,283,285,288,289, & ! index 1585 - 1596
     200,201,210,229,281,282,283,285,288,289,111,211, & ! index 1597 - 1608
     281,282,283,285,288,289,144,206,212,229,230,234, & ! index 1609 - 1620
     281,282,283,285,288,289,184,187,195,200,201,205, & ! index 1621 - 1632
     209,211,212,213,226,229,230,233,234,238,239,257, & ! index 1633 - 1644
     265,272,281,282,283,284,285,288,289,158,171,172, & ! index 1645 - 1656
     181,214,241,244,255,273,281,283,284,286,292,123, & ! index 1657 - 1668
     128,136,152,159,215,241,242,244,255,273,274,281, & ! index 1669 - 1680
     283,285,286,287,289,142,216,270,281,282,283,285, & ! index 1681 - 1692
     288,289,217,246,247,248,253,281,282,283,284,285, & ! index 1693 - 1704
     288,289,170,204,218,245,265,281,283,284,288,204, & ! index 1705 - 1716
     218,219,245,259,265,281,283,284,288,107,112,113, & ! index 1717 - 1728
     155,167,168,204,220,254,265,281,283,284,288,221, & ! index 1729 - 1740
     227,277,280,284,286,288,125,153,222,272,281,282, & ! index 1741 - 1752
     283,287,288,289,291,292,223,262,281,283,285,286, & ! index 1753 - 1764
     288,142,177,190,204,216,223,224,225,245,254,262, & ! index 1765 - 1776
     265,270,281,282,283,284,285,286,288,289,225,271, & ! index 1777 - 1788
     281,282,285,288,289,110,226,281,282,283,285,288 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_5 = (/ &
     289,227,283,284,285,287,141,228,270,281,282,283, & ! index 1801 - 1812
     287,288,289,292,110,226,229,281,282,283,285,288, & ! index 1813 - 1824
     289,111,211,230,281,282,283,285,288,289,148,231, & ! index 1825 - 1836
     256,264,281,282,283,287,288,289,292, 94,103,144, & ! index 1837 - 1848
     151,154,162,177,184,190,195,205,206,209,220,226, & ! index 1849 - 1860
     229,230,232,233,234,239,254,257,258,262,265,281, & ! index 1861 - 1872
     282,283,284,285,288,289,104,233,281,282,283,285, & ! index 1873 - 1884
     288,289,110,111,211,226,233,234,281,282,283,285, & ! index 1885 - 1896
     288,289,126,153,235,272,281,282,283,287,288,289, & ! index 1897 - 1908
     291,292,204,218,236,245,265,266,281,283,284,288, & ! index 1909 - 1920
     175,225,237,260,271,281,282,283,285,288,289,169, & ! index 1921 - 1932
     238,239,281,282,283,284,285,286,288,289,101,102, & ! index 1933 - 1944
     110,111,143,210,211,226,229,239,281,282,283,285, & ! index 1945 - 1956
     286,288,289,  1,  2,  3, 92, 95,105,106,109,118, & ! index 1957 - 1968
     124,129,150,183,194,240,242,244,274,281,283,284, & ! index 1969 - 1980
     285,286,288,171,172,214,241,244,255,273,274,281, & ! index 1981 - 1992
     283,284,286,287,292, 95,100,124,150,183,194,240, & ! index 1993 - 2004
     242,244,274,281,283,284,285,286,288, 91,114,130, & ! index 2005 - 2016
     139,140,144,145,152,166,171,172,176,181,183,184, & ! index 2017 - 2028
     187,194,203,204,214,217,218,219,232,233,234,236, & ! index 2029 - 2040
     237,239,240,241,242,243,244,245,246,247,248,253, & ! index 2041 - 2052
     254,255,257,258,259,260,261,262,265,266,271,273, & ! index 2053 - 2064
     274,275,278,279,281,282,283,284,285,286,287,288, & ! index 2065 - 2076
     289,290,291,292,181,240,242,244,273,274,281,283, & ! index 2077 - 2088
     284,285,286,288,292,170,218,245,254,265,281,283, & ! index 2089 - 2100
     284,288,179,182,189,246,247,281,282,283,284,285, & ! index 2101 - 2112
     288,289,179,182,189,246,247,281,282,283,284,285, & ! index 2113 - 2124
     288,289,189,248,281,282,283,284,285,288,289,170, & ! index 2125 - 2136
     218,245,249,254,265,281,282,283,284,288,289,291, & ! index 2137 - 2148
     191,198,216,222,225,228,231,235,236,237,245,249 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_6 = (/ &
     250,254,256,257,259,260,264,265,266,267,268,269, & ! index 2161 - 2172
     270,271,272,277,280,281,282,283,284,285,286,287, & ! index 2173 - 2184
     288,289,291,292,120,227,251,270,271,276,277,280, & ! index 2185 - 2196
     283,284,285,286,287,288, 97,138,223,252,262,276, & ! index 2197 - 2208
     279,281,282,283,285,286,288,289,290,179,182,253, & ! index 2209 - 2220
     281,282,283,284,285,288,289,254,265,268,283,284, & ! index 2221 - 2232
     288,289,153,176,214,215,241,242,244,255,264,270, & ! index 2233 - 2244
     273,274,275,278,281,283,284,285,286,287,288,289, & ! index 2245 - 2256
     292,179,182,189,256,281,282,283,284,285,288,289, & ! index 2257 - 2268
     290,163,167,168,257,263,265,281,282,283,288,289, & ! index 2269 - 2280
     116,134,147,151,156,163,184,192,193,218,219,220, & ! index 2281 - 2292
     245,254,257,258,259,262,263,265,268,277,280,281, & ! index 2293 - 2304
     282,283,284,285,286,288,289,156,227,259,276,281, & ! index 2305 - 2316
     282,283,284,285,287,288,289,175,180,225,260,271, & ! index 2317 - 2328
     281,282,283,284,285,286,288,289, 94,148,151,154, & ! index 2329 - 2340
     156,161,162,163,184,195,196,198,202,206,219,220, & ! index 2341 - 2352
     224,225,229,230,231,233,234,236,245,254,256,257, & ! index 2353 - 2364
     259,261,262,263,264,265,266,268,269,270,271,276, & ! index 2365 - 2376
     277,280,281,282,283,284,285,286,287,288,289,290, & ! index 2377 - 2388
     292,262,268,282,283,284,285,288,289,155,167,168, & ! index 2389 - 2400
     204,254,263,265,268,281,282,283,284,285,288,289, & ! index 2401 - 2412
     126,235,253,264,272,281,282,283,284,285,287,288, & ! index 2413 - 2424
     289,291,292,155,167,168,227,265,281,282,283,284, & ! index 2425 - 2436
     285,287,288,289,157,195,221,227,230,233,266,271, & ! index 2437 - 2448
     277,280,281,282,283,284,285,286,287,288,289,131, & ! index 2449 - 2460
     176,189,206,229,230,234,252,262,267,268,272,276, & ! index 2461 - 2472
     279,281,282,283,284,285,286,287,288,289,290,291, & ! index 2473 - 2484
     292,197,227,262,268,281,282,283,284,285,287,288, & ! index 2485 - 2496
     289,141,151,157,163,165,166,180,184,188,193,198, & ! index 2497 - 2508
     203,209,217,218,220,221,223,227,228,231,236,237 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_7 = (/ &
     239,245,246,247,248,253,254,256,257,260,262,263, & ! index 2521 - 2532
     264,265,266,268,269,270,271,272,277,280,281,282, & ! index 2533 - 2544
     283,284,285,286,287,288,289,290,291,292,189,227, & ! index 2545 - 2556
     248,270,276,281,282,283,284,285,287,288,289,292, & ! index 2557 - 2568
     155,167,168,189,221,227,248,265,268,271,277,280, & ! index 2569 - 2580
     281,282,283,284,285,286,287,288,289,145,146,213, & ! index 2581 - 2592
     226,229,230,233,234,238,239,248,249,253,254,257, & ! index 2593 - 2604
     263,265,268,272,281,282,283,284,285,286,287,288, & ! index 2605 - 2616
     289,291,121,122,127,145,152,153,160,173,176,181, & ! index 2617 - 2628
     207,208,214,215,219,220,221,227,236,241,242,244, & ! index 2629 - 2640
     245,250,251,253,254,255,256,257,258,259,260,262, & ! index 2641 - 2652
     263,264,265,266,267,268,269,270,271,272,273,274, & ! index 2653 - 2664
     275,276,277,278,279,280,281,282,283,284,285,286, & ! index 2665 - 2676
     287,288,289,290,291,292,123,135,136,215,241,242, & ! index 2677 - 2688
     244,255,264,267,268,270,272,273,274,275,276,277, & ! index 2689 - 2700
     278,279,280,281,282,283,284,285,286,287,288,289, & ! index 2701 - 2712
     290,291,292,117,120,130,134,141,147,148,151,155, & ! index 2713 - 2724
     156,157,160,161,167,168,174,175,177,178,180,185, & ! index 2725 - 2736
     188,189,190,192,198,200,201,204,205,209,210,211, & ! index 2737 - 2748
     212,216,218,219,220,221,222,223,224,225,226,227, & ! index 2749 - 2760
     228,229,230,231,232,233,234,235,236,237,238,239, & ! index 2761 - 2772
     245,246,247,248,249,251,252,253,254,256,257,258, & ! index 2773 - 2784
     259,260,262,263,264,265,266,267,268,269,270,271, & ! index 2785 - 2796
     272,274,275,276,277,278,279,280,281,282,283,284, & ! index 2797 - 2808
     285,286,287,288,289,290,291,292,155,167,168,186, & ! index 2809 - 2820
     227,265,268,276,277,280,281,282,283,284,285,286, & ! index 2821 - 2832
     287,288,289,130,186,191,193,196,202,221,227,251, & ! index 2833 - 2844
     263,265,268,270,271,276,277,280,281,282,283,284, & ! index 2845 - 2856
     285,286,287,288,289,292,131,138,141,173,191,216, & ! index 2857 - 2868
     223,228,249,252,254,256,262,265,267,268,270,272 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_8 = (/ &
     276,277,278,279,280,281,282,283,284,285,286,287, & ! index 2881 - 2892
     288,289,290,291,292,125,142,144,146,170,179,182, & ! index 2893 - 2904
     187,197,199,206,213,216,217,218,222,225,226,228, & ! index 2905 - 2916
     229,230,233,234,235,237,238,239,245,246,247,248, & ! index 2917 - 2928
     249,253,254,256,257,259,260,262,263,265,266,268, & ! index 2929 - 2940
     270,271,272,276,277,279,280,281,282,283,284,285, & ! index 2941 - 2952
     286,287,288,289,290,291,292,103,121,122,127,144, & ! index 2953 - 2964
     151,154,157,161,163,165,174,179,180,182,186,188, & ! index 2965 - 2976
     189,191,193,195,196,202,204,206,210,220,221,223, & ! index 2977 - 2988
     224,225,227,229,230,232,233,234,236,239,245,251, & ! index 2989 - 3000
     254,257,258,259,260,261,262,263,264,265,266,268, & ! index 3001 - 3012
     269,270,271,272,275,276,277,278,279,280,281,282, & ! index 3013 - 3024
     283,284,285,286,287,288,289,290,291,292, 99,101, & ! index 3025 - 3036
     102,103,104,110,111,117,121,122,125,126,127,131, & ! index 3037 - 3048
     133,134,138,140,141,142,143,144,146,147,151,154, & ! index 3049 - 3060
     155,156,157,160,161,162,163,164,165,167,168,170, & ! index 3061 - 3072
     173,174,177,178,179,182,184,185,187,188,189,190, & ! index 3073 - 3084
     192,195,197,198,199,200,201,204,205,206,207,208, & ! index 3085 - 3096
     209,210,211,212,213,216,218,219,220,221,222,223, & ! index 3097 - 3108
     225,226,227,228,229,230,231,232,233,234,235,236, & ! index 3109 - 3120
     237,238,239,240,242,244,245,246,247,248,249,251, & ! index 3121 - 3132
     252,253,254,256,257,258,259,260,261,262,263,264, & ! index 3133 - 3144
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 3145 - 3156
     277,278,279,280,281,282,283,284,285,286,287,288, & ! index 3157 - 3168
     289,290,291,292,115,137,148,151,156,161,175,178, & ! index 3169 - 3180
     180,185,188,200,201,202,205,206,209,210,211,212, & ! index 3181 - 3192
     216,219,220,222,223,225,226,227,228,229,230,231, & ! index 3193 - 3204
     233,234,235,237,238,239,245,246,247,248,249,252, & ! index 3205 - 3216
     253,254,256,257,259,260,261,262,263,264,265,266, & ! index 3217 - 3228
     267,268,269,270,271,272,276,277,278,279,280,281 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_9 = (/ &
     282,283,284,285,286,287,288,289,290,291,292, 89, & ! index 3241 - 3252
      90, 92, 94, 99,101,102,103,104,107,109,110,111, & ! index 3253 - 3264
     112,113,115,116,120,121,122,123,125,126,127,128, & ! index 3265 - 3276
     130,131,132,133,136,138,139,140,141,142,144,145, & ! index 3277 - 3288
     146,147,148,150,151,152,153,154,155,156,157,158, & ! index 3289 - 3300
     159,160,161,162,163,164,165,166,167,168,170,171, & ! index 3301 - 3312
     172,173,174,175,176,179,180,181,182,184,187,188, & ! index 3313 - 3324
     189,192,194,195,197,198,199,203,204,206,207,208, & ! index 3325 - 3336
     210,211,213,214,215,216,217,218,219,220,221,222, & ! index 3337 - 3348
     223,224,225,226,227,228,229,230,231,232,233,234, & ! index 3349 - 3360
     235,236,237,238,239,240,241,242,243,244,245,246, & ! index 3361 - 3372
     247,248,249,250,251,252,253,254,255,256,257,258, & ! index 3373 - 3384
     259,260,261,262,263,264,265,266,267,268,269,270, & ! index 3385 - 3396
     271,272,273,274,275,276,277,278,279,280,281,282, & ! index 3397 - 3408
     283,284,285,286,287,288,289,290,291,292,120,136, & ! index 3409 - 3420
     164,169,171,172,179,180,182,189,204,214,217,223, & ! index 3421 - 3432
     227,238,239,240,241,242,244,246,247,248,252,253, & ! index 3433 - 3444
     254,255,257,260,262,263,264,265,268,270,271,272, & ! index 3445 - 3456
     273,274,275,276,277,278,279,280,281,282,283,284, & ! index 3457 - 3468
     285,286,287,288,289,290,291,292,117,130,133,137, & ! index 3469 - 3480
     139,140,144,145,152,166,176,178,179,180,181,182, & ! index 3481 - 3492
     183,185,186,188,189,190,191,192,193,194,196,198, & ! index 3493 - 3504
     200,201,202,203,205,209,210,211,212,217,219,221, & ! index 3505 - 3516
     223,226,227,229,230,232,233,234,236,238,239,240, & ! index 3517 - 3528
     241,242,243,244,245,246,247,248,251,253,254,255, & ! index 3529 - 3540
     257,258,259,260,261,262,263,264,265,266,268,269, & ! index 3541 - 3552
     270,271,272,273,274,275,276,277,278,279,280,281, & ! index 3553 - 3564
     282,283,284,285,286,287,288,289,290,291,292, 96, & ! index 3565 - 3576
      97, 98,108,116,117,119,124,128,129,132,133,137, & ! index 3577 - 3588
     142,143,144,152,154,162,166,169,170,174,178,180 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_10 = (/ &
     181,183,184,185,186,187,188,190,191,192,193,194, & ! index 3601 - 3612
     196,197,198,200,201,202,203,204,205,209,210,211, & ! index 3613 - 3624
     212,216,217,218,219,220,221,222,223,224,225,226, & ! index 3625 - 3636
     227,228,229,230,231,233,234,235,236,237,238,239, & ! index 3637 - 3648
     240,241,242,243,244,245,246,247,248,249,251,252, & ! index 3649 - 3660
     253,254,255,256,257,258,259,260,261,262,263,264, & ! index 3661 - 3672
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 3673 - 3684
     277,278,279,280,281,282,283,284,285,286,287,288, & ! index 3685 - 3696
     289,290,291,292,  2,118,121,122,123,127,128,129, & ! index 3697 - 3708
     135,145,149,150,152,153,159,160,171,172,173,176, & ! index 3709 - 3720
     181,183,194,207,208,214,215,219,220,221,227,236, & ! index 3721 - 3732
     240,241,242,244,245,250,251,253,254,255,256,257, & ! index 3733 - 3744
     258,259,260,262,263,264,265,266,267,268,269,270, & ! index 3745 - 3756
     271,272,273,274,275,276,277,278,279,280,281,282, & ! index 3757 - 3768
     283,284,285,286,287,288,289,290,291,292,105,124, & ! index 3769 - 3780
     132,154,162,177,178,184,185,186,187,190,191,192, & ! index 3781 - 3792
     193,196,198,200,201,202,205,209,210,211,212,216, & ! index 3793 - 3804
     218,220,221,222,223,225,226,227,228,229,230,231, & ! index 3805 - 3816
     233,234,235,236,237,238,239,240,242,244,245,246, & ! index 3817 - 3828
     247,248,249,251,252,253,254,256,257,259,260,262, & ! index 3829 - 3840
     263,264,265,266,267,268,270,271,272,273,274,275, & ! index 3841 - 3852
     276,277,278,279,280,281,282,283,284,285,286,287, & ! index 3853 - 3864
     288,289,290,291,292, 92, 99,115,117,127,130,137, & ! index 3865 - 3876
     160,177,178,185,188,190,192,200,201,202,205,209, & ! index 3877 - 3888
     210,211,212,216,222,223,224,225,226,227,228,229, & ! index 3889 - 3900
     230,231,233,234,235,237,238,239,245,246,247,248, & ! index 3901 - 3912
     249,250,252,253,254,256,257,259,260,262,263,264, & ! index 3913 - 3924
     265,266,267,268,269,270,271,272,274,275,276,277, & ! index 3925 - 3936
     278,279,280,281,282,283,284,285,286,287,288,289, & ! index 3937 - 3948
     290,291,292,146,156,164,165,179,182,197,203,234 /)
  INTEGER, PARAMETER, DIMENSION(102) :: LU_ICOL_11 = (/ &
     237,246,247,248,253,256,257,259,260,262,263,265, & ! index 3961 - 3972
     266,268,271,272,276,277,280,281,282,283,284,285, & ! index 3973 - 3984
     286,287,288,289,290,291,292,197,225,249,254,256, & ! index 3985 - 3996
     262,265,268,271,272,277,280,281,282,283,284,285, & ! index 3997 - 4008
     286,287,288,289,290,291,292,  3, 89, 90, 98, 99, & ! index 4009 - 4020
     106,129,149,150,153,158,171,172,176,181,183,194, & ! index 4021 - 4032
     214,215,240,241,242,244,255,264,270,272,273,274, & ! index 4033 - 4044
     275,276,277,278,279,280,281,282,283,284,285,286, & ! index 4045 - 4056
     287,288,289,290,291,292 /)
  INTEGER, PARAMETER, DIMENSION(4062) :: LU_ICOL = (/&
    LU_ICOL_0, LU_ICOL_1, LU_ICOL_2, LU_ICOL_3, LU_ICOL_4, &
    LU_ICOL_5, LU_ICOL_6, LU_ICOL_7, LU_ICOL_8, LU_ICOL_9, &
    LU_ICOL_10, LU_ICOL_11 /)

  INTEGER, PARAMETER, DIMENSION(293) :: LU_CROW = (/ &
       1,  2,  3,  4,  9, 38, 41, 49, 57, 59, 68, 71, & ! index 1 - 12
      74, 76, 81, 84, 98,101,111,113,115,117,121,123, & ! index 13 - 24
     126,128,131,134,215,300,354,364,374,377,391,394, & ! index 25 - 36
     397,400,490,506,541,566,576,579,584,592,595,607, & ! index 37 - 48
     611,614,617,654,683,725,739,762,772,786,811,815, & ! index 49 - 60
     819,823,826,829,834,838,841,844,854,861,864,867, & ! index 61 - 72
     870,873,876,879,882,885,888,891,893,896,899,902, & ! index 73 - 84
     905,908,911,914,917,919,921,925,927,931,933,935, & ! index 85 - 96
     938,941,944,946,949,951,953,955,957,960,964,968, & ! index 97 - 108
     975,979,982,985,990,995,1005,1009,1013,1016,1022,1028, & ! index 109 - 120
     1031,1034,1037,1040,1047,1051,1055,1058,1062,1065,1068,1072, & ! index 121 - 132
     1078,1082,1088,1095,1100,1105,1110,1115,1119,1123,1127,1135, & ! index 133 - 144
     1141,1145,1150,1155,1160,1171,1176,1179,1183,1187,1191,1195, & ! index 145 - 156
     1199,1204,1213,1223,1228,1233,1239,1243,1249,1256,1262,1266, & ! index 157 - 168
     1270,1282,1287,1292,1297,1304,1311,1318,1323,1329,1335,1339, & ! index 169 - 180
     1344,1349,1353,1359,1364,1371,1378,1386,1393,1397,1403,1410, & ! index 181 - 192
     1419,1426,1436,1444,1452,1462,1469,1487,1495,1503,1510,1520, & ! index 193 - 204
     1525,1534,1542,1567,1588,1597,1607,1615,1627,1654,1668,1686, & ! index 205 - 216
     1695,1707,1716,1726,1740,1747,1759,1766,1787,1794,1802,1807, & ! index 217 - 228
     1817,1826,1835,1846,1879,1887,1899,1911,1921,1932,1943,1960, & ! index 229 - 240
     1984,1998,2014,2081,2094,2103,2115,2127,2136,2149,2189,2203, & ! index 241 - 252
     2218,2228,2235,2258,2270,2281,2312,2324,2337,2390,2398,2413, & ! index 253 - 264
     2428,2441,2460,2486,2498,2555,2569,2590,2619,2683,2716,2817, & ! index 265 - 276
     2836,2863,2898,2960,3035,3173,3252,3419,3477,3576,3701,3779, & ! index 277 - 288
     3870,3952,3992,4016,4063 /)

  INTEGER, PARAMETER, DIMENSION(293) :: LU_DIAG = (/ &
       1,  2,  3,  4,  9, 38, 41, 49, 57, 59, 68, 71, & ! index 1 - 12
      74, 76, 81, 84, 98,101,111,113,115,117,121,123, & ! index 13 - 24
     126,128,131,134,215,300,354,364,374,377,391,394, & ! index 25 - 36
     397,400,490,506,541,566,576,579,584,592,595,607, & ! index 37 - 48
     611,614,617,654,683,725,739,762,772,786,811,815, & ! index 49 - 60
     819,823,826,829,834,838,841,844,854,861,864,867, & ! index 61 - 72
     870,873,876,879,882,885,888,891,893,897,899,903, & ! index 73 - 84
     905,909,911,915,917,919,921,925,927,931,933,935, & ! index 85 - 96
     938,941,944,946,949,951,953,955,957,960,964,968, & ! index 97 - 108
     975,980,983,985,990,996,1005,1009,1013,1016,1022,1028, & ! index 109 - 120
     1031,1034,1037,1043,1047,1051,1055,1058,1062,1065,1068,1073, & ! index 121 - 132
     1078,1082,1089,1095,1100,1105,1110,1116,1119,1123,1128,1138, & ! index 133 - 144
     1141,1145,1150,1155,1160,1171,1176,1179,1183,1187,1191,1195, & ! index 145 - 156
     1199,1204,1214,1223,1228,1234,1239,1243,1250,1256,1262,1266, & ! index 157 - 168
     1272,1282,1287,1292,1297,1304,1311,1318,1323,1329,1335,1339, & ! index 169 - 180
     1344,1349,1353,1359,1364,1371,1379,1387,1393,1397,1403,1412, & ! index 181 - 192
     1419,1429,1436,1444,1454,1463,1469,1488,1496,1503,1510,1520, & ! index 193 - 204
     1526,1534,1550,1571,1589,1599,1608,1617,1636,1658,1673,1687, & ! index 205 - 216
     1695,1709,1718,1733,1740,1749,1759,1772,1787,1795,1802,1808, & ! index 217 - 228
     1819,1828,1836,1863,1880,1892,1901,1913,1923,1933,1952,1974, & ! index 229 - 240
     1987,2005,2046,2084,2096,2106,2119,2128,2139,2161,2191,2206, & ! index 241 - 252
     2220,2228,2242,2261,2273,2296,2314,2327,2366,2390,2403,2416, & ! index 253 - 264
     2432,2447,2469,2489,2537,2558,2578,2608,2663,2697,2799,2824, & ! index 265 - 276
     2851,2883,2946,3022,3161,3241,3409,3468,3568,3694,3773,3865, & ! index 277 - 288
     3948,3989,4014,4062,4063 /)


END MODULE gckpp_JacobianSP

